home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The Word 5
/
The Word 5.adf
/
FiLeS
/
AREXX_EXAMPLES.lha
/
AREXX_EXAMPLES
/
Example13.rexx
< prev
next >
Wrap
OS/2 REXX Batch file
|
1995-02-25
|
310b
|
13 lines
/* Example 13 */
fileptr = "tempfile"
path = "RAM:TempFile"
If Open(fileptr, path, "R") Then Do
Do While ~Eof(fileptr) /* While NOT End Of File */
Say Readln(fileptr) /* Read A Line Of Characters */
End
Call Close(fileptr)
End
Else
Say "Unable to open and read file..."